home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / comm.swg / 0051_Flushing Fossil Buffers.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1994-08-24  |  155 b   |  12 lines

  1.  
  2. Procedure PurgeInput; assembler;
  3. { Purges the input buffer -- Empties it into obilivion! }
  4. asm
  5.   mov AH, $0A
  6.   mov DX, port
  7.   Int $14
  8. End;
  9.  
  10.  
  11.  
  12.